CreationDate: "Monday, February 08, 1999 10:06:12"
GUIName: "Script"
Win: 7
CSMgr: 8
DocExts: 9
Source: "theView = av.GetActiveDoc\n"
)
(DocWin.7
Owner: 6
X: -4
Y: -4
W: 1034
H: 643
)
(CSMgr.8
)
(DocAct.9
Doc: 6
)
(SEd.10
Name: "0.link.image"
CreationDate: "Tue Jul 08 12:51:47 1997"
GUIName: "Script"
Win: 11
CSMgr: 12
DocExts: 13
Source: "theVal = SELF\nthePath = _theHome.AsString + \"\\images\\\" + theVal\nif (not (theVal.IsNull)) then\n if (File.Exists(thePath.AsFileName)) then\n 'MsgBox.info(thePath,\"\")\n i = ImageWin.Make(thePath.AsFileName, theVal)\n i.Open\n 'thePicView = AV.GetProject.FindDoc(\"images\")\n 'for each I in thePicView.GetThemes\n 'thePicView.DeleteTheme(I)\n 'end\n 'NewTheme = Theme.make(srcname.make(thePath))\n 'NewTheme.setVisible(true)\n 'thePicView.addTheme(NewTheme)\n
'thePicView.getwin.activate \n else\n MsgBox.Warning(\"File \"+theVal+\" not found.\",\"Hot Link\")\n end\nend\n"
)
(DocWin.11
Owner: 10
X: -4
Y: -4
W: 1034
H: 671
)
(CSMgr.12
)
(DocAct.13
Doc: 10
)
(SEd.14
Name: "0.start2"
CreationDate: "Thursday, February 04, 1999 12:48:02"
GUIName: "Script"
Win: 15
CSMgr: 16
DocExts: 17
Source: "' Startup\n\n' Function: Displays banner and sets event updates for entire project\n' Developed by: Gregory Gunther, ggunther@usgs.gov and Laura R.H. Biewick, lbiewick@usgs.gov\n\n' Variable definitions\n\n' Defines setting for project\nav.Maximize\nav.SetName(\"Geologic Assessment of Coal in the Colorado Plateau : United States Geological Survey\")\nProjWin = av.GetProject\nProjWin.GetWin.Minimize\n\n' Opens initial view\nthePath = AV.GetProject.GetFilename\n_theHome = thePath.returndir.returndir\n theDoc = av.GetProject
.FindDoc(\"Colorado Plateau Assessment Areas with ArcView Project\")\n theDoc.GetWin.Open\n theDoc.GetWin.Maximize\n theDoc.GetWin.Activate\n\natool = av.FindGui(\"Opening View\").GetToolBar.GetControls.Get(8)\natool.Select\natool.Update\n\npath = \"cp/misc/display.gif\".AsString 'Path to banner image\nMsgBox.Banner(path.AsFileName, 0, \"Geologic Assessment of Coal in the Colorado Plateau\")\npath = \"cp/misc/message.gif\".AsString 'Path to banner image\nMsgBox.Banner(path.AsFileName, 0, \"Geologic Assessment of Coal in
the Colorado Plateau\")\npath = \"cp/misc/title.gif\".AsString 'Path to banner image\nMsgBox.Banner(path.AsFileName, 25, \"National Coal Assessment\")\n\n_stopIt = FALSE 'Note: \"_stopIt = FALSE\" allows view refresh, \"_stopIt = TRUE\" turns off automatic refresh\n\n' MsgBox.Info(\"The help file provides some tailored help to get users started. It is accessible by clicking on the mortarboard button in the main menu.\".AsString, \"National Coal Assessment\")\n\n' results = av.run(\"script1\",ProjWin) \n_theHomePath = FileName.Ge
tCWD"
FontSize: 1
)
(DocWin.15
Owner: 14
X: -4
Y: -4
W: 1034
H: 671
)
(CSMgr.16
)
(DocAct.17
Doc: 14
)
(View.18
Name: "A Title Page"
CreationDate: "Friday, February 05, 1999 01:01:40"
GUIName: "View"
Win: 19
CSMgr: 20
DocExts: 22
DocExts: 23
Graphics: 24
Theme: 31
Dpy: 25
TOCWidth: 150
CoordPrecision: 2
)
(DocWin.19
Owner: 18
X: -4
Y: -4
W: 1034
H: 671
)
(CSMgr.20
Client: 21
)
(CSClient.21
Client: 22
ReqName: "ClientNfy"
)
(PanMgr.22
Doc: 18
)
(DocAct.23
Doc: 18
)
(GList.24
Dpy: 25
FormatNumb: 30
)
(MapDpy.25
Left: -36.90000000000003
Bottom: -27.35000000000002
Top: 563.35000000000002
Right: 763.90000000000009
Scale: 26
FrameTop: 6.66666666666667
FrameRight: 9.05208333333333
PageDpy: 27
FitToPage: 1
MouseLoc: 29
)
(Numb.26
N: 0.01128604480560
)
(PageDpy.27
Top: 6.66666666666667
Right: 9.05208333333333
ReportUnits: 1
Units: 1
Scale: 28
ZoomRight: 9.05208333333333
ZoomTop: 6.66666666666667
GridSpacingX: 0.25000000000000
GridSpacingY: 0.25000000000000
)
(Numb.28
N: 0.11047180667434
)
(PointD.29
x: 10.46445312499999
y: 556.88921874999994
)
(Numb.30
)
(ITheme.31
Name: "Title Page"
Source: 32
Flags: 0x06
Legend: 39
Threshold: 43
View: 18
GSet: 44
LegEditScript: "View.EditLegend"
)
(ISrc.32
Name: 33
MapBox: 35
BandStats: 36
BandStats: 37
BandStats: 38
)
(SrcName.33
FileName: 34
Name: "title.jpg"
OwnerClass: "ISrc"
)
(FN.34
Path: "cp/misc/title.jpg"
)
(RectD.35
Left: -0.50000000000000
Top: 536.50000000000000
Right: 727.50000000000000
Bottom: -0.50000000000000
)
(BStat.36
Max: 255.00000000000000
Mean: 127.50000000000000
StDv: 63.75000000000000
)
(BStat.37
Max: 255.00000000000000
Mean: 127.50000000000000
StDv: 63.75000000000000
)
(BStat.38
Max: 255.00000000000000
Mean: 127.50000000000000
StDv: 63.75000000000000
)
(MBILeg.39
GreenBand: 1
BlueBand: 2
RedLUT: 40
GreenLUT: 41
BlueLUT: 42
)
(ILUTIdn.40
)
(ILUTIdn.41
)
(ILUTIdn.42
)
(Thresh.43
)
(GSet.44
)
(View.45
Name: "Colorado Plateau Assessment Areas with ArcView Project"
CreationDate: "Tuesday, February 16, 1999 04:00:20"
